﻿Imports Entidades

Imports Datos.DBPedido
Public Class daoPedido
    Dim w As Datos.DBPedido
    Sub New()
        w = New Datos.DBPedido
    End Sub
    Function AltaPedido(ByVal nodo As Entidades.Pedido) As Boolean
        Return w.AltaPedido(nodo)
    End Function
    Function BajaPedido(ByVal nodo As Entidades.Pedido) As Boolean
        Return w.AltaPedido(nodo)
    End Function
    Function ModificarPedido(ByVal nodo As Entidades.Pedido) As Boolean
        Return w.AltaPedido(nodo)
    End Function
    Function consultapedido() As ArrayList
        Return w.consultapedido
    End Function

End Class
